﻿

module Event
open System.Windows.Forms

let text1 = "F# 普京致电特朗普，感谢挫败恐袭"
let text2 = "F# Windows"

let form = new Form(Text=text1,
                    Visible = true,
                    TopMost = true)

form.Click.Add(fun evArgs -> System.Console.Beep())
form.Click.Add(fun evArgs -> form.Text <- if form.Text = text1 then text2 else text1)

